-- card: 38674 from stack: in.0-2
-- bmap block id: 39473
-- flags: 0000
-- background id: 15301
-- name: applications.1
----- HyperTalk script -----
fe ae fe c5e f4e f5e es ds cs ds cs bb4s
-- hidden cd fld "theOrder" holds the order that the font animation
--- characters for this simulation get put into the field over the
--- computer screen

on openApp
  set cursor to none
  repeat with n = 1 to the number of lines of cd fld "theOrder"
    lock screen
    if (line n of cd fld "theOrder" = "›") then
      play "typing3" fe ae fe ce fe
      wait 4
      play "typing3" fe es ds
      wait 3
      play "typing3" fe ae fe ce fe
      wait 4
      play "typing3" fe es ds
    end if
    put line n of cd fld "theOrder" into cd fld "computerScreen"
    unlock screen with iris open
    wait 15
  end repeat
end openApp

on openApp
  set cursor to none
  repeat with n = 1 to the number of lines of cd fld "theOrder"
    lock screen
    if (line n of cd fld "theOrder" = "›") then
      play "typing3" d
      play "typing3" c
      play "typing3" c
      wait 4
      play "typing3" c
      wait 5
      play "typing3"
      play "typing3"
      wait 2
      play "typing3"
    end if
    put line n of cd fld "theOrder" into cd fld "computerScreen"
    unlock screen with iris open
    wait 15
  end repeat
end openApp


-- part 6 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=63 top=82 right=300 bottom=408
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 174
-- text size: 14
-- style flags: 0
-- line height: 14
-- part name: 


-- part 2 (field)
-- low flags: 01
-- high flags: 0000
-- rect: left=293 top=166 right=229 bottom=361
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 214
-- text size: 80
-- style flags: 0
-- line height: 80
-- part name: computerScreen


-- part 3 (field)
-- low flags: 81
-- high flags: 4007
-- rect: left=437 top=54 right=275 bottom=477
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 9
-- style flags: 0
-- line height: 12
-- part name: theOrder


-- part 1 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=304 top=192 right=219 bottom=347
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 
----- HyperTalk script -----
on mouseUp
  openApp
end mouseUp



-- part contents for card part 2
----- text -----
⁄

-- part contents for card part 3
----- text -----
⁄
€
‹
‹
‹
›
fi
fl
‡
°
°
°
°
·
·
·
€
⁄

-- part contents for card part 6
----- text -----
With a little simple HyperTalk scripting you can create a button that will open any other Macintosh application. You can then work freely in that application. When you quit, you will return to the last place where you were in HyperCard. 

Click “Open Word Processor” 
on the computer screen
for a simulation of how a 
button opens another 
application.